home *** CD-ROM | disk | FTP | other *** search
/ Cine Live 70 / Cine Live 70.iso / pc / Data / Interface / e12s.k < prev    next >
Encoding:
Text File  |  2003-06-05  |  7.0 KB  |  281 lines
  1. module oRoot1 is cBox
  2. with 
  3.     Flags is $00000152; 
  4.     release Editor:
  5.         IOWindow is {$000001FB,$000000D0,$000001DA,$0000029A,$00000000,$00000000,$00000000,$00000000};
  6.         LayoutWindow is {$000000A1,$0000007B,$000002A0,$00000245,$00000000,$00000000,$00000064,$00000000};
  7.     end;
  8.     Name is "Root"; 
  9.     Enabled is false; 
  10.     
  11.     Width is 800; Height is 600; 
  12.     
  13.     Kind is DrawOpaque; 
  14.     Elements is [
  15.         oslide2,
  16.         oslide23,
  17.         oslide34,
  18.         oslide45
  19.     ];
  20.     Events is [
  21.         cOnscreenEvent
  22.         with Flags is $00000004; 
  23.             Commands is [
  24.                 cShowCommand
  25.                 with Flags is $00000004; Target is oslide2; end,
  26.                 cEnableCommand
  27.                 with Flags is $00000004; Target is oslide2; end,
  28.                 cFocusCommand
  29.                 with Target is oslide2; end,
  30.                 cRunCommand
  31.                 with Flags is $00000004; Target is oslide2; Rewind is true; end
  32.             ];
  33.         end
  34.     ];
  35. end;
  36.  
  37. object oslide2 is cImage
  38. with 
  39.     Name is "slide"; 
  40.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  41.     
  42.     Width is 800; Height is 600; 
  43.     Duration is 2; Duration is 2; TimeScale is 1; 
  44.     URL is "../../Photos/Terminator%203/A%20Schwarzenegger.jpg"; 
  45.     
  46.     
  47.     Events is [
  48.         cKeyboardEvent
  49.         with Test is IsSpace; 
  50.             Commands is [
  51.                 cFocusCommand
  52.                 with Target is oTargetSelf; end,
  53.                 cRunCommand
  54.                 with Target is oTargetSelf; Mode is Toggle; end
  55.             ];
  56.         end,
  57.         cMouseUpEvent
  58.         with Flag is true; 
  59.             Commands is [
  60.                 cRunCommand
  61.                 with Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  62.                 cEnableCommand
  63.                 with Target is oTargetSelf; Mode is Clear; end,
  64.                 cShowCommand
  65.                 with Target is oTargetSelf; Mode is Clear; end,
  66.                 cRunCommand
  67.                 with Target is oslide23; Mode is Clear; Rewind is true; end,
  68.                 cEnableCommand
  69.                 with Target is oslide23; Mode is Clear; end,
  70.                 cShowCommand
  71.                 with Target is oslide23; Mode is Clear; end,
  72.                 cBackCommand
  73.                 with end
  74.             ];
  75.         end,
  76.         cFinishedEvent
  77.         with 
  78.             Commands is [
  79.                 cShowCommand
  80.                 with Target is oslide2; Mode is Clear; end,
  81.                 cEnableCommand
  82.                 with Target is oslide2; Mode is Clear; end,
  83.                 cRunCommand
  84.                 with Target is oslide2; Mode is Clear; Rewind is true; end,
  85.                 cFocusCommand
  86.                 with Target is oslide23; end,
  87.                 cShowCommand
  88.                 with Target is oslide23; end,
  89.                 cEnableCommand
  90.                 with Target is oslide23; end,
  91.                 cRunCommand
  92.                 with Target is oslide23; Rewind is true; end
  93.             ];
  94.         end
  95.     ];
  96. end;
  97.  
  98. object oslide23 is cImage
  99. with 
  100.     Flags is $00000010; 
  101.     Name is "slide2"; 
  102.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  103.     
  104.     Width is 800; Height is 600; 
  105.     Duration is 2; Duration is 2; TimeScale is 1; 
  106.     URL is "../../Photos/Terminator%203/J%20Mostow.jpg"; 
  107.     
  108.     
  109.     Events is [
  110.         cKeyboardEvent
  111.         with Test is IsSpace; 
  112.             Commands is [
  113.                 cFocusCommand
  114.                 with Target is oTargetSelf; end,
  115.                 cRunCommand
  116.                 with Target is oTargetSelf; Mode is Toggle; end
  117.             ];
  118.         end,
  119.         cMouseUpEvent
  120.         with Flag is true; 
  121.             Commands is [
  122.                 cEnableCommand
  123.                 with Target is oTargetSelf; Mode is Clear; end,
  124.                 cShowCommand
  125.                 with Target is oTargetSelf; Mode is Clear; end,
  126.                 cRunCommand
  127.                 with Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  128.                 cEnableCommand
  129.                 with Target is oslide34; Mode is Clear; end,
  130.                 cShowCommand
  131.                 with Target is oslide34; Mode is Clear; end,
  132.                 cRunCommand
  133.                 with Target is oslide34; Mode is Clear; Rewind is true; end,
  134.                 cBackCommand
  135.                 with end
  136.             ];
  137.         end,
  138.         cFinishedEvent
  139.         with 
  140.             Commands is [
  141.                 cShowCommand
  142.                 with Target is oslide23; Mode is Clear; end,
  143.                 cEnableCommand
  144.                 with Target is oslide23; Mode is Clear; end,
  145.                 cRunCommand
  146.                 with Target is oslide23; Mode is Clear; Rewind is true; end,
  147.                 cFocusCommand
  148.                 with Target is oslide34; end,
  149.                 cShowCommand
  150.                 with Target is oslide34; end,
  151.                 cEnableCommand
  152.                 with Target is oslide34; end,
  153.                 cRunCommand
  154.                 with Target is oslide34; Rewind is true; end
  155.             ];
  156.         end
  157.     ];
  158. end;
  159.  
  160. object oslide34 is cImage
  161. with 
  162.     Flags is $00000150; 
  163.     Name is "slide3"; 
  164.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  165.     
  166.     Width is 800; Height is 600; 
  167.     Duration is 2; Duration is 2; TimeScale is 1; 
  168.     URL is "../../Photos/Terminator%203/K%20Loken%2001.jpg"; 
  169.     
  170.     
  171.     Events is [
  172.         cKeyboardEvent
  173.         with Flags is $00000004; Test is IsSpace; 
  174.             Commands is [
  175.                 cFocusCommand
  176.                 with Flags is $00000004; Target is oTargetSelf; end,
  177.                 cRunCommand
  178.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  179.             ];
  180.         end,
  181.         cMouseUpEvent
  182.         with Flags is $00000004; Flag is true; 
  183.             Commands is [
  184.                 cEnableCommand
  185.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  186.                 cShowCommand
  187.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  188.                 cRunCommand
  189.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  190.                 cEnableCommand
  191.                 with Flags is $00000004; Target is oslide45; Mode is Clear; end,
  192.                 cShowCommand
  193.                 with Flags is $00000004; Target is oslide45; Mode is Clear; end,
  194.                 cRunCommand
  195.                 with Flags is $00000004; Target is oslide45; Mode is Clear; Rewind is true; end,
  196.                 cBackCommand
  197.                 with Flags is $00000004; end
  198.             ];
  199.         end,
  200.         cFinishedEvent
  201.         with Flags is $00000004; 
  202.             Commands is [
  203.                 cShowCommand
  204.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  205.                 cEnableCommand
  206.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  207.                 cRunCommand
  208.                 with Flags is $00000004; Target is oslide34; Mode is Clear; Rewind is true; end,
  209.                 cFocusCommand
  210.                 with Flags is $00000004; Target is oslide45; end,
  211.                 cShowCommand
  212.                 with Flags is $00000004; Target is oslide45; end,
  213.                 cEnableCommand
  214.                 with Flags is $00000004; Target is oslide45; end,
  215.                 cRunCommand
  216.                 with Flags is $00000004; Target is oslide45; Rewind is true; end
  217.             ];
  218.         end
  219.     ];
  220. end;
  221.  
  222. object oslide45 is cImage
  223. with 
  224.     Name is "slide4"; 
  225.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  226.     
  227.     Width is 800; Height is 600; 
  228.     Duration is 2; Duration is 2; TimeScale is 1; 
  229.     URL is "../../Photos/Terminator%203/K%20Loken%2002.jpg"; 
  230.     
  231.     
  232.     Events is [
  233.         cKeyboardEvent
  234.         with Test is IsSpace; 
  235.             Commands is [
  236.                 cFocusCommand
  237.                 with Target is oTargetSelf; end,
  238.                 cRunCommand
  239.                 with Target is oTargetSelf; Mode is Toggle; end
  240.             ];
  241.         end,
  242.         cMouseUpEvent
  243.         with Flag is true; 
  244.             Commands is [
  245.                 cEnableCommand
  246.                 with Target is oTargetSelf; Mode is Clear; end,
  247.                 cShowCommand
  248.                 with Target is oTargetSelf; Mode is Clear; end,
  249.                 cRunCommand
  250.                 with Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  251.                 cEnableCommand
  252.                 with Target is oslide2; Mode is Clear; end,
  253.                 cShowCommand
  254.                 with Target is oslide2; Mode is Clear; end,
  255.                 cRunCommand
  256.                 with Target is oslide2; Mode is Clear; Rewind is true; end,
  257.                 cBackCommand
  258.                 with end
  259.             ];
  260.         end,
  261.         cFinishedEvent
  262.         with 
  263.             Commands is [
  264.                 cShowCommand
  265.                 with Target is oslide45; Mode is Clear; end,
  266.                 cEnableCommand
  267.                 with Target is oslide45; Mode is Clear; end,
  268.                 cRunCommand
  269.                 with Target is oslide45; Mode is Clear; Rewind is true; end,
  270.                 cFocusCommand
  271.                 with Target is oslide2; end,
  272.                 cShowCommand
  273.                 with Target is oslide2; end,
  274.                 cEnableCommand
  275.                 with Target is oslide2; end,
  276.                 cRunCommand
  277.                 with Target is oslide2; Rewind is true; end
  278.             ];
  279.         end
  280.     ];
  281. end;